home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / Helpfile / GUICtrlRecvMsg.au3 < prev    next >
Encoding:
Text File  |  2006-06-17  |  695 b   |  27 lines
  1. #include <GUIConstants.au3>
  2.  
  3. GUICreate("My GUI")  ; will create a dialog box that when displayed is centered
  4.  
  5. $nEdit = GUICtrlCreateEdit ("line 0", 10,10)
  6. GUICtrlCreateButton ("Ok", 20,200,50)
  7.  
  8. GUISetState ()
  9.  
  10. for $n=1 to 5
  11. GUICtrlSetData ($nEdit, @CRLF & "line "& $n)
  12. next
  13.  
  14. $EM_GETSEL = 0x00B0
  15.  
  16. ; Run the GUI until the dialog is closed
  17. Do
  18.     $msg = GUIGetMsg()
  19.     if $msg >0 then
  20.         $a=GUICtrlRecvMsg($nEdit, $EM_GETSEL)
  21.         GUICtrlSetState($nEdit,$GUI_FOCUS)    ; set focus back on edit control
  22.  
  23. ; will display the wParam and lParam values return by the control
  24.         MsgBox(0,"Current selection",StringFormat("start=%d end=%d", $a[0], $a[1]))
  25.     endif
  26. Until $msg = $GUI_EVENT_CLOSE
  27.